home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 14 / CU Amiga Magazine's Super CD-ROM 14 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-09].iso / CUCD / Programming / Mesa-2.2 / widgets-mesa / demos / cube.c < prev    next >
Encoding:
C/C++ Source or Header  |  1997-01-31  |  8.8 KB  |  366 lines
  1. /* cube.c -- Demo program for the Mesa widget
  2.    Copyright (C) 1995, 1996 Thorsten.Ohl @ Physik.TH-Darmstadt.de
  3.  
  4.    This program is free software; you can redistribute it and/or modify
  5.    it under the terms of the GNU General Public License as published by
  6.    the Free Software Foundation; either version 2 of the License, or
  7.    (at your option) any later version.
  8.  
  9.    This program is distributed in the hope that it will be useful,
  10.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12.    GNU General Public License for more details.
  13.  
  14.    You should have received a copy of the GNU General Public License
  15.    along with this program; see the file COPYING.  If not, write to
  16.    the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  17.  
  18.    $Id: cube.c,v 1.20 1996/09/30 00:21:06 ohl Exp $
  19.  */
  20.  
  21. #include <stdio.h>
  22. #include <stdlib.h>
  23. #include <stdarg.h>
  24. #include <math.h>
  25. #include <X11/X.h>
  26. #include <X11/Intrinsic.h>
  27. #include <X11/StringDefs.h>
  28. #include <X11/Shell.h>
  29. #ifndef __GLX_MOTIF
  30. #include <X11/Xaw/Command.h>
  31. #include <X11/Xaw/Form.h>
  32. #include <GL/xmesa.h>
  33. #include <GL/gl.h>
  34. #include <GL/GLwDrawA.h>
  35. #else /* __GLX_MOTIF */
  36. #include <Xm/PushB.h>
  37. #include <Xm/Form.h>
  38. #include <GL/xmesa.h>
  39. #include <GL/gl.h>
  40. #include <GL/GLwMDrawA.h>
  41. #endif /* __GLX_MOTIF */
  42.  
  43. static char *RCS_Id =
  44. "@(#) $Id: cube.c,v 1.20 1996/09/30 00:21:06 ohl Exp $";
  45.  
  46. static GLint Black, Red, Green, Blue;
  47.  
  48. void quit_function (Widget, XtPointer, XtPointer);
  49.  
  50. void
  51. quit_function (Widget w, XtPointer closure, XtPointer call_data)
  52. {
  53.   exit (0);
  54. }
  55.  
  56. static void
  57. draw_cube (void)
  58. {
  59.   /* X faces */
  60.   glIndexi (Red);
  61.   glColor3f (1.0, 0.0, 0.0);
  62.   glBegin (GL_POLYGON);
  63.   {
  64.     glVertex3f (1.0, 1.0, 1.0);
  65.     glVertex3f (1.0, -1.0, 1.0);
  66.     glVertex3f (1.0, -1.0, -1.0);
  67.     glVertex3f (1.0, 1.0, -1.0);
  68.   }
  69.   glEnd ();
  70.  
  71.   glBegin (GL_POLYGON);
  72.   {
  73.     glVertex3f (-1.0, 1.0, 1.0);
  74.     glVertex3f (-1.0, 1.0, -1.0);
  75.     glVertex3f (-1.0, -1.0, -1.0);
  76.     glVertex3f (-1.0, -1.0, 1.0);
  77.   }
  78.   glEnd ();
  79.  
  80.   /* Y faces */
  81.   glIndexi (Green);
  82.   glColor3f (0.0, 1.0, 0.0);
  83.   glBegin (GL_POLYGON);
  84.   {
  85.     glVertex3f (1.0, 1.0, 1.0);
  86.     glVertex3f (1.0, 1.0, -1.0);
  87.     glVertex3f (-1.0, 1.0, -1.0);
  88.     glVertex3f (-1.0, 1.0, 1.0);
  89.   }
  90.   glEnd ();
  91.  
  92.   glBegin (GL_POLYGON);
  93.   {
  94.     glVertex3f (1.0, -1.0, 1.0);
  95.     glVertex3f (-1.0, -1.0, 1.0);
  96.     glVertex3f (-1.0, -1.0, -1.0);
  97.     glVertex3f (1.0, -1.0, -1.0);
  98.   }
  99.   glEnd ();
  100.  
  101.   /* Z faces */
  102.   glIndexi (Blue);
  103.   glColor3f (0.0, 0.0, 1.0);
  104.   glBegin (GL_POLYGON);
  105.   {
  106.     glVertex3f (1.0, 1.0, 1.0);
  107.     glVertex3f (-1.0, 1.0, 1.0);
  108.     glVertex3f (-1.0, -1.0, 1.0);
  109.     glVertex3f (1.0, -1.0, 1.0);
  110.   }
  111.   glEnd ();
  112.  
  113.   glBegin (GL_POLYGON);
  114.   {
  115.     glVertex3f (1.0, 1.0, -1.0);
  116.     glVertex3f (1.0, -1.0, -1.0);
  117.     glVertex3f (-1.0, -1.0, -1.0);
  118.     glVertex3f (-1.0, 1.0, -1.0);
  119.   }
  120.   glEnd ();
  121. }
  122.  
  123. GLfloat xrot, yrot, zrot;
  124.  
  125. static void
  126. init_display (Widget w)
  127. {
  128.   xrot = yrot = zrot = 0.0;
  129.  
  130.   glClearColor (0.0, 0.0, 0.0, 0.0);
  131.   glClearIndex (Black);
  132.   glClearDepth (10.0);
  133.  
  134.   glMatrixMode (GL_PROJECTION);
  135.   glLoadIdentity ();
  136.   glFrustum (-1.0, 1.0, -1.0, 1.0, 1.0, 10.0);
  137.   glTranslatef (0.0, 0.0, -3.0);
  138.  
  139.   glMatrixMode (GL_MODELVIEW);
  140.   glLoadIdentity ();
  141.  
  142.   glCullFace (GL_BACK);
  143.   glEnable (GL_CULL_FACE);
  144.  
  145.   glShadeModel (GL_FLAT);
  146. }
  147.  
  148. static void
  149. display (Widget w)
  150. {
  151.   glClear (GL_COLOR_BUFFER_BIT);
  152.   glPushMatrix ();
  153.   {
  154.     glRotatef (xrot, 1.0, 0.0, 0.0);
  155.     glRotatef (yrot, 0.0, 1.0, 0.0);
  156.     glRotatef (zrot, 0.0, 0.0, 1.0);
  157.     draw_cube ();
  158.   }
  159.   glPopMatrix ();
  160.   glFinish ();
  161.   glXSwapBuffers (XtDisplay (w), XtWindow (w));
  162.       
  163.   xrot += 1.0;
  164.   yrot += 0.7;
  165.   zrot -= 0.3;
  166. }
  167.  
  168.  
  169. static GLint
  170. alloc_color (Widget w, Colormap cmap, int red, int green, int blue)
  171. { 
  172.   XColor xcolor;
  173.   xcolor.red = red;
  174.   xcolor.green = green;
  175.   xcolor.blue = blue;
  176.   xcolor.flags = DoRed | DoGreen | DoBlue;
  177.   if (!XAllocColor (XtDisplay (w), cmap, &xcolor))
  178.     {
  179.       printf ("Couldn't allocate color!\n");
  180.       exit (1);
  181.     }
  182.   return xcolor.pixel;
  183. }
  184.  
  185. /* This is rather inefficient, but we don't mind for the moment,
  186.    because it works.  */
  187.  
  188. static void
  189. translate_pixels (Widget to, Widget from, ...)
  190. {
  191.   va_list ap;
  192.   char *name;
  193.   Colormap from_cmap, to_cmap;
  194.   XColor xcolor;
  195.  
  196.   XtVaGetValues (from, XtNcolormap, &from_cmap, NULL);
  197.   XtVaGetValues (to, XtNcolormap, &to_cmap, NULL);
  198.  
  199.   va_start (ap, from);
  200.   for (name = va_arg (ap, char *); name != NULL; name = va_arg (ap, char *))
  201.     {
  202.       XtVaGetValues (from, name, &xcolor.pixel, NULL);
  203.       XQueryColor (XtDisplay (from), from_cmap, &xcolor);
  204.       if (!XAllocColor (XtDisplay (to), to_cmap, &xcolor))
  205.     XtAppWarning (XtWidgetToApplicationContext (to),
  206.               "Couldn't allocate color!\n");
  207.       else
  208.     XtVaSetValues (from, name, xcolor.pixel, NULL);
  209.     }
  210.   va_end (ap);
  211. }
  212.  
  213. /* Just like the movies: do 24 frames per second. */
  214. unsigned long delay = 1000/24;
  215.  
  216. static void first_frame (Widget);
  217. static void next_frame (XtPointer, XtIntervalId *);
  218.  
  219. static void
  220. first_frame (Widget w)
  221. {
  222.   XtAppAddTimeOut (XtWidgetToApplicationContext (w),
  223.               delay, next_frame, (XtPointer) w);
  224. }
  225.  
  226. static void
  227. next_frame (XtPointer client_data, XtIntervalId *id)
  228. {
  229.   Widget w = (Widget) client_data;
  230.   first_frame (w);
  231.   display (w);
  232. }
  233.  
  234. static String fallback_resources[] =
  235. {
  236. #ifndef __GLX_MOTIF
  237.   "*GLwDrawingArea.width: 300",
  238.   "*GLwDrawingArea.height: 300",
  239.   "*GLwDrawingArea.rgba: true",
  240.   "*GLwDrawingArea.installColormap: true",
  241.   "*GLwDrawingArea.doublebuffer: true",
  242. #else /* __GLX_MOTIF */
  243.   "*GLwMDrawingArea.width: 300",
  244.   "*GLwMDrawingArea.height: 300",
  245.   "*GLwMDrawingArea.rgba: true",
  246.   "*GLwMDrawingArea.installColormap: true",
  247.   "*GLwMDrawingArea.doublebuffer: true",
  248. #endif /* __GLX_MOTIF */
  249.   NULL
  250. };
  251.  
  252. int
  253. main (int argc, char *argv[])
  254. {
  255.   Widget top, frame, mesa, quit;
  256.   XtAppContext app_context;
  257.   XVisualInfo *vi;
  258.   Boolean rgba, doublebuffer, cmap_installed;
  259.  
  260.   XtSetLanguageProc (NULL, NULL, NULL);
  261.   top = XtVaAppInitialize (&app_context, "Cube",
  262.                NULL, 0,
  263.                &argc, argv, fallback_resources,
  264.                NULL);
  265. #ifndef __GLX_MOTIF
  266.   frame = XtVaCreateManagedWidget ("frame", formWidgetClass,
  267.                    top,
  268.                    NULL);
  269.   mesa = XtVaCreateManagedWidget ("mesa", glwDrawingAreaWidgetClass,
  270.                   frame,
  271.                   NULL);
  272.   quit = XtVaCreateManagedWidget ("quit", commandWidgetClass,
  273.                   frame,
  274.                                   XtNfromHoriz, mesa, XtNhorizDistance, 10,
  275.                   NULL);
  276.   XtAddCallback (quit, XtNcallback, quit_function, NULL);
  277. #else /* __GLX_MOTIF */
  278.   frame = XtVaCreateManagedWidget ("frame", xmFormWidgetClass,
  279.                    top,
  280.                    NULL);
  281.   mesa = XtVaCreateManagedWidget ("mesa", glwMDrawingAreaWidgetClass,
  282.                   frame,
  283.                   XmNtopAttachment, XmATTACH_FORM,
  284.                   XmNtopOffset, 10,
  285.                   XmNleftAttachment, XmATTACH_FORM,
  286.                   XmNleftOffset, 10,
  287.                   XmNrightAttachment, XmATTACH_NONE,
  288.                   XmNbottomAttachment,  XmATTACH_FORM,
  289.                   XmNbottomOffset, 10,
  290.                   NULL);
  291.   quit = XtVaCreateManagedWidget ("quit", xmPushButtonWidgetClass,
  292.                   frame,
  293.                   XmNtopAttachment, XmATTACH_FORM,
  294.                   XmNtopOffset, 10,
  295.                   XmNleftAttachment, XmATTACH_WIDGET,
  296.                   XmNleftOffset, 10,
  297.                   XmNleftWidget, mesa,
  298.                   XmNrightAttachment, XmATTACH_FORM,
  299.                   XmNrightOffset, 10,
  300.                   XmNbottomAttachment, XmATTACH_NONE,
  301.                   NULL);
  302.   XtAddCallback (quit, XmNarmCallback, quit_function, NULL);
  303. #endif /* __GLX_MOTIF */
  304.  
  305.   XtRealizeWidget (top);
  306.  
  307.   XtVaGetValues (mesa,
  308.          GLwNrgba, &rgba,
  309.          GLwNinstallColormap, &cmap_installed,
  310.          GLwNdoublebuffer, &doublebuffer,
  311.          GLwNvisualInfo, &vi,
  312.          NULL);
  313.  
  314.   /* create a visual context */
  315.   GLwDrawingAreaMakeCurrent (mesa,
  316.                  glXCreateContext (XtDisplay(mesa),
  317.                            vi,
  318.                            NULL,
  319.                            GL_FALSE));
  320.  
  321.   if (rgba)
  322.     {
  323.       Black = Red = Green = Blue = 0;
  324.  
  325.       if (cmap_installed)
  326.     {
  327.       /* In RGBA mode, the Mesa widgets will have their own color map.
  328.          Adjust the colors of the other widgets so that--even if the rest
  329.          of the screen has wrong colors--all application widgets have the
  330.          right colors.  */
  331.              
  332.       translate_pixels (mesa, quit,
  333.                 XtNbackground, XtNforeground, XtNborder, NULL);
  334.       translate_pixels (mesa, frame, XtNbackground, XtNborder, NULL);
  335.  
  336.       /* Finally warp the pointer into the mesa widget, to make sure that
  337.          the user sees the right colors at the beginning.  */
  338.  
  339.       XWarpPointer (XtDisplay (mesa), None, XtWindow (mesa),
  340.             0, 0, 0, 0, 0, 0);
  341.     }
  342.     }
  343.   else
  344.     {
  345.       /* Allocate a few colors for use in color index mode.  */
  346.  
  347.       Colormap cmap;
  348.       cmap = DefaultColormap (XtDisplay (top), DefaultScreen (XtDisplay (top)));
  349.       Black = alloc_color (top, cmap, 0x0000, 0x0000, 0x0000);
  350.       Red   = alloc_color (top, cmap, 0xffff, 0x0000, 0x0000);
  351.       Green = alloc_color (top, cmap, 0x0000, 0xffff, 0x0000);
  352.       Blue  = alloc_color (top, cmap, 0x0000, 0x0000, 0xffff);
  353.     }
  354.  
  355.   init_display (mesa);
  356.   first_frame (mesa);
  357.  
  358.   XtAppMainLoop (app_context);
  359.   return (0);
  360. }
  361.  
  362.  
  363.  
  364.  
  365.  
  366.